
% Parametros
intervalos = 5;

% Genero el vector de numeros pseudo-aleatorios.
load 'numeros.txt', numeros;

% Genero las marcas de clase en funcion de la cantidad de intervalos.
vmin = min(numeros);
vmax = max(numeros);
ancho = (vmax - vmin) / intervalos;
marcas = vmin + ancho/2 : ancho : vmax - ancho/2;

% Los clasifico en intervalos.
[frec, xx] = hist(numeros, marcas);

frec
xx

clearplot;
bar(xx, frec);
xlabel('Intervalo de clase de la V.A. C');
ylabel('Frecuencia');
gset encoding iso_8859_1; % Para que se banque tildes
gset terminal postscript eps enhanced color;
gset output '../graficos/histograma.eps';
replot;
